#!/usr/bin/perl
use Encode;
use strict;

my $inputFileName="/bak/vote_user_info";
if(!open(OUTFILE,">>$inputFileName")){
print "that not open".$inputFileName."\n";
exit;
}
# open file
my $line;
open(H,$inputFileName);
while ($line=<H>)
{
print $line;
}

exit;


